% Definice gramatických kategorií.
:- encoding(utf8).

% Pády.
case(nominative).
case(genitive).
case(dative).
case(acc).
case(vocative).
case(locative).
case(inst).

% Předložkové pády.
prep_case(inessivus). % v něčem
prep_case(sublativus). % na něco
prep_case(supe). % na něčem

prep_case(inessivus, v, locative).
prep_case(sublativus, na, accusative).
prep_case(supe, na, locative).
prep_case(elativus, z, genitive).

depcase(Case) :- case(Case), Case \= nominative.
nomacc(nominative).
nomacc(accusative).
nomacc(vocative).

% Rody.
gender(masca).
gender(masci).
gender(fem).
gender(neut).

masc(masca).
masc(masci).

nofem(X) :- masc(X); X = neut.

% Čísla.
num(sg).
num(dual). % Bude potřeba u přídavných jmen.
num(pl).

% Slovesné časy.

tense(present).
tense(past).
tense(future).